<?

include("../ezine_inc/config_temp.php");
include("../feb_scripts/v2/includes/site.vars.php");
include("../feb_scripts/v2/includes/functions.php");

function log_bighip_unsubscribes($msg,$line=0,$file='')
{
    
    $logpath = '/web/sites/beano33/ezine_inc/logs';
    $fh = fopen("$logpath/bighip.unsubscribes.log","a");
    flock($fh,LOCK_EX);
    fputs($fh,date("YmdHis") . "|$msg|$line|$file|\n");
    flock($fh,LOCK_UN);
    fclose($fh);
    
}

if (file_exists("../feb_scripts/v2/includes/geoip.inc") AND file_exists("/usr/local/share/GeoIP/GeoIP.dat"))
{
    
    include('../feb_scripts/v2/includes/geoip.inc');
    $gi = geoip_open("/usr/local/share/GeoIP/GeoIP.dat",GEOIP_STANDARD);
    $SUB_COUNTRIES = array();
    $CON_COUNTRIES = array();
    $UNS_COUNTRIES = array();
    $TOTAL_CON_IPS = 0;
    $TOTAL_SUB_IPS = 0;
    $TOTAL_UNS_IPS = 0;
    $do_geo = 1;
    
}

## set number of seconds that a cancelation is concidered premature..
$chk_time = 86400; // note: 86400 = 24 hours

#################### IP CHECKING BLOCK ######################################
## get users IP even if they are hiding behind most proxy's
## this code is 95-98% accurate but much better than just using REMOTE_ADDR
if ($HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"])
{
    
	// this env sometimes contains several IP's seperated by whitespace.. so we need to grab the first one..
	$temp = explode(" ",$HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"]);
	$usersip = $temp[0];
    
}
else
{
    
	$usersip = $HTTP_SERVER_VARS["REMOTE_ADDR"];
    
}

################## WEBSITE INFO BLOCK ########################

if (eregi("smutdailymailer",$SERVER_NAME))
{

	$additional_check = 1;
    $site_sql = "SELECT * FROM ".$db_name.".websites, ".$db_name.".website_programs WHERE websites.websiteid='$siteid' AND website_programs.websiteid=websites.websiteid LIMIT 1";
	$site_exe = mysql_query($site_sql,$db);
	$site_res = mysql_fetch_assoc($site_exe);
	$websitename = $site_res[websitename];
	$sitename = $websitename;
	$websitehtac = $site_res[htaccess];
	$websiteurl = $site_res[websiteurl];
	$siteid = $site_res[websiteid];
    $programid = $site_res[programid];

} 
else 
{

	$additional_check = 0;
	$thishost = explode(".",strtolower($SERVER_NAME));
	$which =  sizeof($thishost) - 2;
	$hthost = $thishost[$which];
    $htaccess = $hthost;
    
    $site_sql = "SELECT * FROM ".$db_name.".websites, ".$db_name.".website_programs WHERE websites.htaccess='$htaccess' AND website_programs.websiteid=websites.websiteid LIMIT 1";
	$site_exe = mysql_query($site_sql,$db);
	$site_res = mysql_fetch_assoc($site_exe);
	$websitename = $site_res[websitename];
	$websitehtac = $hthost;
	$websiteurl = $site_res[websiteurl];
	$siteid = $site_res[websiteid];
	$genniche = $site_res[genniche];
    $programid = $site_res[programid];
	$sitename = $site_res[websitename];

}

#################### DATE & PERIOD BLOCK ##############################
/* get current date data */
$cur_month = date("m");
$cur_year = date("Y");
$cur_day = date("j");
$cur_archive = "${cur_year}_${cur_month}";

if ($cur_day < '16')
{
    
	$cur_period = "01";
    
} 
else 
{
    
	$cur_period = "02";
    
}


#################### UNSUBSCRIBE CONFIRMATION BLOCK ##################
function send_final_email($email,$domain,$template,$subject)
{
	
	// check domain syntax.. grabbing the last 2 pieces (whatever.com)
	$dom = explode(".",$domain);
	$last_var = sizeof($dom) - 1;
	$first_var = $last_var - 1;
	$domainparsed = "$dom[$first_var].$dom[$last_var]";
	
	if ($template)
	{
		
		$headers  = "MIME-Version: 1.0\n";
		$headers .= "Content-type: text/html; charset=iso-8859-1\n";
		$this = file($template);
		while(list($line)=each($this))
		{
			
			$emailbody .= eregi_replace("<%%USERNAME%%>","$email",$this[$line]);
			
		}
		
	} 
	else
	{
		
		/////////////////////////////////////////////
		$emailbody  = "Hello,\n";
		$emailbody .= "\n";
		$emailbody .= "This email is to inform you that\n";
		$emailbody .= "your email address $email \n";
		$emailbody .= "has successfully been removed from\n";
		$emailbody .= "our database. To subscribe again\n";
		$emailbody .= "please visit our website:\n";
		$emailbody .= "http://www.$domainparsed/\n";
		$emailbody .= "\n";
		$emailbody .= "As a GoodBye Gift, We've gathered\n";
		$emailbody .= "some really great discounts for you.\n";
		$emailbody .= "These are not offered anywhere on the\n";
		$emailbody .= "net and are only avaiable thru US to give.\n";
		$emailbody .= "We hope you enjoy these as much as we\n";
		$emailbody .= "have..\n";
		$emailbody .= "\n";
		
		if($genniche == "amateur")
		{
			
			$emailbody .= "  ** EXCLUSIVE 1 DAY FREE TRIALS **\n";
			$emailbody .= "Juicy Loads - http://fetishads.com/juicyloads.php\n";
			$emailbody .= "Wow 18  - http://fetishads.com/wow18.php\n";
			$emailbody .= "Superior XXX - http://fetishads.com/superiorxxx.php\n";
			$emailbody .= "Softcore Cuties    - http://fetishads.com/softcorecuties.php\n";
			
		}
		elseif($genniche == "ebony")
		{
			
			$emailbody .= "  ** EXCLUSIVE 1 DAY FREE TRIALS **\n";
			$emailbody .= "Juicy Loads - http://fetishads.com/juicyloads.php\n";
			$emailbody .= "Wow 18  - http://fetishads.com/wow18.php\n";
			$emailbody .= "Superior XXX - http://fetishads.com/superiorxxx.php\n";
			$emailbody .= "Softcore Cuties    - http://fetishads.com/softcorecuties.php\n";
			
		}
		else
		{
			
			$emailbody .= "  ** EXCLUSIVE 1 DAY FREE TRIALS **\n";
			$emailbody .= "Juicy Loads - http://fetishads.com/juicyloads.php\n";
			$emailbody .= "Wow 18  - http://fetishads.com/wow18.php\n";
			$emailbody .= "Superior XXX - http://fetishads.com/superiorxxx.php\n";
			$emailbody .= "Softcore Cuties    - http://fetishads.com/softcorecuties.php\n";
			
		}
		
		
		$emailbody .= "\n";
		$emailbody .= "We hope you've enjoyed your membership to \n";
		$emailbody .= "our website.\n";
		$emailbody .= "\n";
		$emailbody .= "\n";
		$emailbody .= "Thank you!\n";
		$emailbody .= "- support@$domainparsed\n";
	
	}

	if (!$subject)
	{
		
		$subject = "You're Un-subscribed, Good Bye!";
		
	}

	$headers .= "From: support@$domainparsed\n";
	$headers .= "Reply-To: support@$domainparsed\n";
	$php_version = phpversion();
	$headers .= "X-Mailer: PHP/$php_version\n";
	$headers .= "X-Sender: support@$domainparsed\n";
	$headers .= "X-U64E: " . base64_encode("$email") . "\n";
	
	mail($email,$subject,$emailbody,$headers);

}


##################### HEADER & TEMPLATE BLOCK #########################
$my_host = strtolower($SERVER_NAME);
$my_arr = explode(".",$my_host);

if (sizeof($my_arr) == '2')
{

	$htaccess = $my_arr[0];
	$domainparsed = $my_host;

}
else
{

	$try_first = "$my_arr[1].$my_arr[2]";
	$htaccess = $my_arr[1];
	$domainparsed = $try_first;

}

$include = $_SERVER["DOCUMENT_ROOT"] . "/header_logo.php";

include_once("../ezine_inc/bighip.vars.php");
$listid = (int)$bighip["$siteid"];

############################# MAIN ROUTINE BLOCK ################################3
if ($trigger)
{

	if (!$email)
	{
        
		$responce = "You must enter an email address for us to unsubscribe.";
        
	}
	else
	{
        
		$email = trim(strtolower($email));
        $email_escaped = mysql_escape_string($email);
		
		if ($additional_check)
		{
            
			// since we don't know niche they are from, we have to delete from ALL smut daily members tables
            $sql2 = "SELECT * FROM ".$db_name.".websites, ".$db_name.".website_programs WHERE websites.websiteurl LIKE '%smutdailymailer%' AND website_programs.websiteid=websites.websiteid";
			$exe2 = mysql_query($sql2,$db);
			while($res2 = mysql_fetch_assoc($exe2))
			{
                
				extract($res2);
				// DELETE FROM MEMBERS TABLE - NO MATTER WHAT! 
				$sql = "DELETE FROM ezine_members.ezine_${websiteid}_members WHERE email='$email_escaped'";
				$exe = mysql_query($sql,$db);
				$del_num = mysql_affected_rows($db);
                
			}
            
		}
		else
		{
            
            $sql3 = "SELECT status FROM ezine_members.ezine_${siteid}_members WHERE email='$email_escaped' LIMIT 1";
            $exe3 = mysql_query($sql3,$db);
            while($res3 = mysql_fetch_assoc($exe3))
            {
                
                extract($res3);
                
            }
            
            if ($listid AND $status == 'bonded')
            {
                
                ##########################################################################
                ## BEGIN BIGHIP BLOCK
                ##########################################################################
                
                $url = "http://moderator.bighip.com/remove_membership.jsp?listid=$listid&email=$email&remoteaddr=$usersip";
                $user_agent = "beano33";
                $ch = curl_init();
                if (!$ch)
                {
                    
                    // log failures
                    @log_bighip_unsubscribes("FAILURE: " . "Failed to even initialize cURL",__LINE__,__FILE__);
                    
                }
                
                @curl_setopt($ch, CURLOPT_URL,$url);
                @curl_setopt($ch, CURLOPT_USERAGENT, $user_agent);
                @curl_setopt($ch, CURLOPT_FOLLOWLOCATION,1);
                @curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
                @curl_setopt($ch, CURLOPT_TIMEOUT,30);
                @curl_setopt($ch, CURLOPT_REFERER, "http://{$_SERVER['HTTP_HOST']}{$_SERVER['REQUEST_URI']}");
                
                // execute cURL
                $result=@curl_exec($ch);
                
                if (empty($result))
                {
                    
                    // log failures
                    @log_bighip_unsubscribes("FAILURE: " . @curl_error($ch),__LINE__,__FILE__);
                    
                }
                
                // get technical info on the connection
                $info = @curl_getinfo($ch);
                
                // close connection
                @curl_close($ch);
                
                if (empty($info['http_code']) OR $info['http_code'] >= 400 OR $info['http_code'] <= 0)
                {
                    
                    // log failures
                    @log_bighip_unsubscribes("FAILURE: " . urlencode(trim($result)),__LINE__,__FILE__);
                    
                }
                else
                {
                    
                    if (strpos(trim($result),"You have been removed") === FALSE)
                    {
                        
                        // log failures
                        @log_bighip_unsubscribes("FAILURED TO UNSUBSCRIBE: $email => $listid",__LINE__,__FILE__);
                        
                    }
                    else
                    {
                        
                        // log successes (temporarily)
                        @log_bighip_unsubscribes("UNSUBSCRIBED: $email => $listid",__LINE__,__FILE__);
                        
                    }
                    
                }
                
                ##########################################################################
                ## ENDOF BIGHIP BLOCK
                ##########################################################################
                
            }
            
			// DELETE FROM MEMBERS TABLE - NO MATTER WHAT! 
			$sql = "DELETE FROM ezine_members.ezine_${siteid}_members WHERE email='$email_escaped'";
			$exe = mysql_query($sql,$db);
			$del_num = mysql_affected_rows($db);
            
		}
        
        // get range of possible periods
        $period_range = array_reverse(get_period_range("12","16","2001",date("m"),date("d"),date("Y")));
        
        // todays subscription table
        $archives[] = "`$subs_main_db`.`subscriptions_" . $programid . "`";
        
        // get all the period archives
        foreach($period_range AS $a => $period)
        {
            
            $archives[] = "`$subs_arch_db`.`archived_" . $programid . "_" . $period[year] . "_" . $period[month] . "_" . $period[period] ."`";
            
        }
        
        $b = 0;
        for($a=0;$a<count($archives);$a++)
        {
            
            $archive = $archives[$a];
            $sql = "SELECT subid, subscribeip, confirmip, unsubscribeip, confirmtime, unsubscribetime FROM $archive WHERE email='$email_escaped' AND websiteid = '$siteid'";
            $exe = mysql_query($sql,$db) OR DIE(logIt("| " . mysql_error($db) . " | " . __LINE__ . " | " . __FILE__ . " | $sql |\n"));
            while($res = mysql_fetch_assoc($exe))
            {
                
            	extract($res);
                
                $upd_sql = "UPDATE $archive SET subscribetime=subscribetime";
                if ($confirmtime == '00000000000000'){ $send = 1; $upd_sql .= ", confirmtime=NOW()"; } // auto confirm if not confirmed (prevents second_confirm from sending!)
                if ($unsubscribetime == '00000000000000'){ $send = 1; $upd_sql .= ", unsubscribetime=NOW()"; } // update the unsubscribe time if it hasn't already been done
                if (strlen($subscribeip) == 0){ $send = 1; $upd_sql .= ", subscribeip='$usersip'"; } // update the subscribeip if missing (should always be false!)
                if (strlen($confirmip) == 0){ $send = 1; $upd_sql .= ", confirmip='$usersip'"; } // update the confirmip
                if (strlen($unsubscribeip) == 0){ $send = 1; $upd_sql .= ", unsubscribeip='$usersip'"; } // update the unsubscribe ip
                $upd_sql .= " WHERE subid='$subid' AND email='$email_escaped' AND websiteid='$siteid' LIMIT 1"; // where clause
                
                // update only if something gets changed from original status
                if ($send == 1)
                {
                    
                    $upd_exe = mysql_query($upd_sql,$db) OR DIE(logIt("| " . mysql_error($db) . " | " . __LINE__ . " | " . __FILE__ . " | $sql |\n"));
                    $canceled += mysql_affected_rows($db);
                    // echo("<!-- updt: $upd_sql -->\n");
                    
                }
                else
                {
                    
                    // echo("<!-- noup: $upd_sql -->\n");
                    
                }
                
                unset($send);
                unset($upd_sql);
                
            }
            
        }
        
		// if user was unsubscribed, send unsubscribe email..
		if ($del_num >= '1' OR $canceled)
		{
            
			unset($subject);
			unset($template);
			$final_responce  = "Your Email Address Has Been Unsubscribed. Have a nice day!";
            if (!$ne)
            {
                send_final_email($email,$HTTP_HOST,$template,$subject);
            }
            
		}

		$reseller = $webmaster;
        
        //skip for now
        $timeline = $chk_time + 1;
        
		// if all the conditions are correct - add one point to the monitor counter
		if ($canceled AND $user_found AND $webmaster != 'none' AND $webmaster != 'hawgscash' AND $timeline <= $chk_time)
		{

			$sql_str = "SELECT * FROM $db_name.monitor WHERE username='$reseller'";
			$sql_exe = mysql_query($sql_str,$db);
			$sql_num = mysql_num_rows($sql_exe);
		
			if ($sql_num > 0)
			{

				// row exists.. update..
				$sql_str = "UPDATE $db_name.monitor SET counter=counter + 1 WHERE username='$reseller'";
				$sql_exe = mysql_query($sql_str,$db);

			}
			else
			{

				// row doesn't exist, insert..
				$sql_str = "INSERT INTO $db_name.monitor (username,counter) values ('$reseller','1')";
				$sql_exe = mysql_query($sql_str,$db);

			}

		}
        
		if (!$user_found)
		{
            
			if ($del_num >= 1)
			{
                
				$final_responce  = "Your Email Address '$email' Has Been Unsubscribed. Have a nice day!";
                
			}
			else
			{
                
				$final_responce = "Your Email Address '$email' is Already Unsubscribed. Have a nice day!";
                
			}
            
		}
        
	}

}

?>
<HTML>
  <HEAD> 
    <TITLE><? echo($sitename); ?> - Membership &amp; Subscription Cancelation
      Form</TITLE> 

<? 
if ($final_responce){ 

	if($siteid==18 || $siteid==93)
	{

		$consolepage = "4freeamateur";

	}
	elseif($siteid==19 || $siteid==97)
	{

		$consolepage = "4freeasianfpa";

	}
	elseif($siteid==29)
	{

		$consolepage = "4freeindian";

	}
	elseif($siteid==50 || $siteid==69)
	{

		$consolepage = "4freevideo";

	}
	elseif($siteid==78 || $siteid==40 || $siteid==44 || $siteid==95 || $siteid==113)
	{

		$consolepage = "4freeshemale";

	}
	elseif($siteid==8 || $siteid==45 || $siteid==110)
	{

		$consolepage = "4freevoyeur";

	}
	elseif($siteid==37)
	{

		$consolepage = "4freeporn";

	}
	elseif($siteid==22)
	{

		$consolepage = "4freebigtits";

	}
	elseif($siteid==25 || $siteid==103 || $siteid==5 || $siteid==94)
	{

		$consolepage = "4freeebony";

	}
	elseif($siteid==28 || $siteid==77 || $siteid==3 || $siteid==16 || $siteid==99 || $siteid==109)
	{

		$consolepage = "4freegay";

	}
	elseif($siteid==26 || $siteid==21 || $siteid==52 || $siteid==60 || $siteid==27 || $siteid==106)
	{

		$consolepage = "4freefetish";

	}
	elseif($siteid==32 || $siteid==81 || $siteid==98)
	{

		$consolepage = "4freelesbian";

	}
	elseif($siteid==33 || $siteid==101)
	{

		$consolepage = "4freemature";

	}
	elseif($siteid==43 || $siteid==67 || $siteid==92 || $siteid==23 || $siteid==111)
	{

		$consolepage = "4freeteen";

	}
	elseif($siteid==48 || $siteid==46)
	{

		$consolepage = "4freesexxx";

	}
	else
	{

		$consolepage = "4freeporn";

	}
    
    if (!$ne)
    {
    	?>
    	<script language='javascript'>
    	<!--
    	   popmeWindow = window.open("http://www.freeezinebucks.com/4freeads/<? echo $consolepage; ?>", "pimpPopUp", "toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,copyhistory=0,target=subpopup,height=460,width=775");
    	// -->
    	</script>


    	<?
    }
}
?>
</HEAD>
<BODY TEXT="WHITE" LINK="YELLOW" BGCOLOR="BLACK" VLINK="#DDDDDD" ALINK="RED">


 <CENTER>
<? include($include); ?>
<BR>
<BR>
<? if (!$final_responce)
{ 
	echo("<B>$responce</B>");
	?>
      <FORM METHOD=POST>
        <INPUT TYPE="HIDDEN" NAME="trigger" VALUE="1">
        <INPUT TYPE="HIDDEN" NAME="p" VALUE="<? echo($p); ?>">
        <INPUT TYPE="HIDDEN" NAME="ne" VALUE="<? echo($ne); ?>">
        <TABLE WIDTH="450" CELLPADDING="5" CELLSPACING="5"> 
          <TR>
            <TD COLSPAN="2" ALIGN="CENTER">
              <H2>Membership Cancelation Form</H2></TD>
          </TR>
          <TR> 
            <TD COLSPAN="2" ALIGN="CENTER"><FONT SIZE="+1"><B>Enter Your Info
              Below</B></FONT></TD> 
          </TR> 
          <TR> 
            <TD><B>Email Address:</B></TD> 
            <TD><B><INPUT TYPE="TEXT" NAME="email" value="<? if ($ee){ echo(base64_decode($ee)); } elseif ($e){ echo("$e"); } else { echo($email); } ?>"></B></TD> 
          </TR> 
          <TR> 
            <TD COLSPAN="2" ALIGN="CENTER"><BR><B><INPUT TYPE="SUBMIT"
              VALUE="Unsubscribe & Cancel My Account"></B></TD> 
          </TR> 
        </TABLE></FORM>
	<BR><BR><BR>
	<font size=-1>
	note: because of our email list caching system, it can take upto 24 hours to be completely removed <BR>
	from our mailing list, so you may recived one more email from us. please disregard that email<BR> 
	and delete it from your computer - you will not recieve anymore emails after that.
	</font>
	<?
} 
else 
{ 
	echo($final_responce); 
	include("/web/sites/beano33/ezine_inc/unsub_sponsors.php");
	?>
	
	<br><br>
	<div align="center">
	  <center>
	<P><font face="Tahoma" ><strong><font color="#ff0000" size=6><b>   PRIVACY ALERT!<br>
	      </b></font></strong></font><FONT face=Arial size=5><STRONG><FONT color=#ffffff size=3>YOU HAVE BEEN DETECTED VISITING ADULT SITES!</FONT></STRONG></FONT></P>
	<P><FONT face=Arial size=5><STRONG><a href="http://www.interneteraser.com/enter.html?ID=1110354" target="_blankIE"><FONT color=#ffff33 size=4>CLICK HERE TO PROTECT YOUR PRIVACY</FONT></a><FONT size=4> </FONT></STRONG></FONT></P>
	  </center>
	  <center>
	  </center>
	</div>
	<?
}
?>
</CENTER> </BODY>
</HTML>